﻿Friend Class B1TreeEvent
    Implements IB1TreeEvent
    Friend _FormUID As String = String.Empty
    Friend _FormType As String = String.Empty
    Friend _ItemUID As String = String.Empty
    Friend _EventType As TreeEventType
    Friend _MenuUID As String = String.Empty
    Friend _NodeKeyValue As String = String.Empty
    Friend _Row As Integer
    Friend _ColUID As String = String.Empty
    Friend _ActionSuccess As Boolean = False
    Friend _BeforeAction As Boolean = True


    Public ReadOnly Property ActionSuccess As Boolean Implements IB1TreeEvent.ActionSuccess
        Get
            Return _ActionSuccess
        End Get
    End Property

    Public ReadOnly Property BeforeAction As Boolean Implements IB1TreeEvent.BeforeAction
        Get
            Return _BeforeAction
        End Get
    End Property

    Public ReadOnly Property ColUID As String Implements IB1TreeEvent.ColUID
        Get
            Return _ColUID
        End Get
    End Property

    Public ReadOnly Property EventType As TreeEventType Implements IB1TreeEvent.EventType
        Get
            Return _EventType
        End Get
    End Property

    Public ReadOnly Property FormType As String Implements IB1TreeEvent.FormType
        Get
            Return _FormType
        End Get
    End Property

    Public ReadOnly Property FormUID As String Implements IB1TreeEvent.FormUID
        Get
            Return _FormUID
        End Get
    End Property

    Public ReadOnly Property ItemUID As String Implements IB1TreeEvent.ItemUID
        Get
            Return _ItemUID
        End Get
    End Property

    Public ReadOnly Property MenuUID As String Implements IB1TreeEvent.MenuUID
        Get
            Return _MenuUID
        End Get
    End Property

    Public ReadOnly Property NodeKeyValue As String Implements IB1TreeEvent.NodeKeyValue
        Get
            Return _NodeKeyValue
        End Get
    End Property

    Public ReadOnly Property Row As Integer Implements IB1TreeEvent.Row
        Get
            Return _Row
        End Get
    End Property
End Class
